note
	description: "Misil Exocet de la Armada Argentina"
	author: "Agustin Orge Queiruga (LU85538) y Victoria Martinez de la Cruz (LU87620)"
	date: ""
	revision: ""

class
	MISIL

feature {NONE}
	-- Atributos de instancia
	ubicacionObjetivo : STRING

feature

	Activar
		-- Activa el material explosivo del misil

		local
			r: RANDOM
			t: DATE_TIME
		do
			create r.make
			create t.make_now
			r.set_seed(t.seconds)
			if ((r.next_random(t.seconds) \\ 2) = 0) then
				r:= void
				r.set_seed(1)
			end

		end

	Fijar_Blanco (ubicacion : STRING)
		-- Carga la ubicacion del objetivo en la memoria del misil

		local
			r: RANDOM
			t: DATE_TIME
		do
			create r.make
			create t.make_now
			r.set_seed(t.seconds)
			if ((r.next_random(t.seconds) \\ 2) = 0) then
				r:= void
				r.set_seed(1)
			end

			-- Si no falla, el misil guarda el objetivo
			ubicacionObjetivo := ubicacion

			ensure
				ubicacionObjetivo /= Void

		end


	Despegar
		-- Hace que el misil emprenda vuelo		

		local
			r: RANDOM
			t: DATE_TIME
		do
			create r.make
			create t.make_now
			r.set_seed(t.seconds)
			if ((r.next_random(t.seconds) \\ 2) = 0) then
				r:= void
				r.set_seed(1)
			end

			-- Si no falla, entonces el misil despega

		end

end
